(project-find-settings-file): Fix last change.

diff --git a/lisp/files.el b/lisp/files.el
index 05442d4665e622cf0c48c1eb0b3226380e3495f3..6c45abeb3eec8714d58c2bde890f4efa2abb8453 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -3222,7 +3222,8 @@ Otherwise this returns nil."
     (let* ((settings (locate-dominating-file file project-settings-file))
           (pda nil))
       ;; `locate-dominating-file' may have abbreviated the name.
-      (if settings (setq settings (expand-file-name ".dir-settings.el" settings)))
+      (if settings
+         (setq settings (expand-file-name project-settings-file settings)))
       (dolist (x project-directory-alist)
        (when (and (eq t (compare-strings file nil (length (car x))
                                          (car x) nil nil))